From: Ergus Date: Tue, 24 Aug 2021 18:08:54 +0000 (+0300) Subject: * lisp/mouse.el (context-menu-mode-map): Bind [menu] to context-menu-open. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~18^2~1574 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=b8704b52fde7568516472f1841ad49c717f445d1;p=emacs.git * lisp/mouse.el (context-menu-mode-map): Bind [menu] to context-menu-open. https://lists.gnu.org/archive/html/emacs-devel/2021-08/msg01004.html --- diff --git a/lisp/mouse.el b/lisp/mouse.el index a490aac7445..d137419e02a 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -468,6 +468,7 @@ the same menu with changes such as added new menu items." (let ((map (make-sparse-keymap))) (define-key map [mouse-3] nil) (define-key map [down-mouse-3] context-menu-entry) + (define-key map [menu] #'context-menu-open) (when (featurep 'ns) (define-key map [C-mouse-1] nil) (define-key map [C-down-mouse-1] context-menu-entry))